home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr01 / halcn305.zip / TUTOR05.PAS < prev    next >
Pascal/Delphi Source File  |  1993-04-21  |  373b  |  18 lines

  1. program Tutor05;
  2. {$N+,E+}          {Required for floating point number handling}
  3. uses
  4.    GSOB_DBF;
  5. var
  6.    MyFile : GSO_DB3Build;
  7. begin
  8.    with MyFile do
  9.    begin
  10.       Init('TUTOR5');
  11.       InsertField('FIELD1','C',8,0);
  12.       InsertField('SECOND','D',8,0);
  13.       InsertField('THIRD','L',1,0);
  14.       InsertField('FOURTH','N',6,2);
  15.       Done;
  16.    end;
  17. end.
  18.